object MainForm: TMainForm Left = 249 Top = 107 HorzScrollBar.Visible = False BiDiMode = bdLeftToRight BorderIcons = [] BorderStyle = bsNone ClientHeight = 84 ClientWidth = 104 Color = clBtnFace Font.Charset = SHIFTJIS_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = '�l�r �o�S�V�b�N' Font.Style = [] OldCreateOrder = False ParentBiDiMode = False PopupMenu = PopupMenu1 Position = poDefault Scaled = False OnClose = FormClose OnCloseQuery = FormCloseQuery OnCreate = FormCreate OnDestroy = FormDestroy OnMouseDown = FormMouseDown OnMouseMove = FormMouseMove OnMouseUp = FormMouseUp PixelsPerInch = 96 TextHeight = 12 object PopupMenu1: TPopupMenu OnPopup = PopupMenu1Popup Left = 8 Top = 8 object PmMove: TMenuItem Caption = '�ړ�(&M)' OnClick = PmMoveClick end object PmWinMost: TMenuItem Caption = '��Ɏ�O�ɕ\��(&Z)' OnClick = PmWinMostClick end object PmPut: TMenuItem Caption = '��\��(&N)' OnClick = PmPutClick end object PmLine01: TMenuItem Caption = '-' end object PmSound: TMenuItem Caption = '�T�E���h(&S)' Checked = True OnClick = PmSoundClick end object PmLine02: TMenuItem Caption = '-' end object PmShowAbout: TMenuItem OnClick = PmShowAboutClick end object PmLine03: TMenuItem Caption = '-' end object PmExit: TMenuItem Caption = '�I��(&X)' OnClick = PmExitClick end end end